﻿Public Class TabbordDossier
    Inherits OpenDelibPage
    Implements IPostBackEventHandler

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Master.Titre = "Tableau de bord dossiers"

        If Not IsPostBack Then
            InitializePage()
        End If
    End Sub

    Private Sub InitializePage()
        divNouveau.Attributes("onclick") = ClientScript.GetPostBackEventReference(Me, "divClickNouveau")
        divListe.Attributes("onclick") = ClientScript.GetPostBackEventReference(Me, "divClickListe")
    End Sub

    Public Sub RaisePostBackEvent1(eventArgument As String) Implements IPostBackEventHandler.RaisePostBackEvent
        If Not String.IsNullOrEmpty(eventArgument) Then
            Select Case eventArgument
                Case "divClickNouveau"
                    Response.Redirect("~/Rapport/FicheRapport.aspx")
                Case "divClickListe"
                    Response.Redirect("~/Rapport/ListeRapports.aspx")
            End Select
        End If
    End Sub

End Class